home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PadHop.dxr / Internal_8_frog jump.ls < prev    next >
Encoding:
Text File  |  2002-01-31  |  436 b   |  23 lines

  1. property pSprite, spriteNum
  2. global gFrog, gInMotion
  3.  
  4. on beginSprite me
  5.   pSprite = sprite(spriteNum)
  6. end
  7.  
  8. on mouseDown me
  9.   if not gInMotion then
  10.     if isFrogOn2(pSprite) then
  11.       puppetSound(6, "jump")
  12.       if pSprite.member.name = "turtle" then
  13.         timeout("follow").forget()
  14.       else
  15.         if pSprite.pFla then
  16.           timeout("followy").forget()
  17.         end if
  18.       end if
  19.       gFrog.mJump()
  20.     end if
  21.   end if
  22. end
  23.